home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1988 August / 1988-08.d64 / progpage #2 (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1988-01-01  |  160 b   |  7 lines
  1. 5 poke 646,14:poke 53280,14:poke53281,6
  2. 10 poke 784,108:poke 785,122:poke 786,0
  3. 20 def fn rs(ln)=usr(ln)+pos(" [184] [163][168][168][198]_[165]_l'[168]")
  4. 30 x=fn rs(50):read s$:print s$
  5. 40 data first
  6. 50 data second
  7.